Loading
Scriptbox
 VBScript Links 
 About VBscript 
 JavaScript Links 
 About JavaScript 
 Powershell Links 
 PSCRIPT the Script Launcher 
 PowerShell Shortcut Keys 
 About Powershell 
     VBScript
    JavaScript
    Powershell
Disclaimer
Contact
Latest 10 Scripts
Script search
  :: { Category } :: 0-9ABCDEFGHIJKLMNOPQRSTUVWXYZ
         

Search Options:  List  Andrew  File  System  Database  Server  DNS  Records  

 Content of List Andrew File System Database Server DNS Records.vbs
MD5 Hash: CC3BDF67A8FEF5D89B6639A9CE9D9AC4
' Description: Returns information about the Andrew File System database server (AFSDB) resource records on a DNS server.


strComputer = "."
SSet objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & _
"\root\MicrosoftDNS")

Set colItems = objWMIService.ExecQuery("Select * from MicrosoftDNS_AFSDBType")

For Each objItem in colItems
Wscript.Echo "Owner Name: " & objItem.OwnerName
Wscript.Echo "Container Name: " & objItem.ContainerName
Wscript.Echo "DNS Server Name: " & objItem.DnsServerName
Wscript.Echo "Domain Name: " & objItem.DomainName
Wscript.Echo "Record Class: " & objItem.RecordClass
Wscript.Echo "Record Data: " & objItem.RecordData
Wscript.Echo "Server Name: " & objItem.ServerName
Wscript.Echo "Subtype: " & objItem.Subtype
Wscript.Echo "Text Representation: " & objItem.TextRepresentation
Wscript.Echo "Timestamp: " & objItem.Timestamp
Wscript.Echo "Time-to-Live: " & objItem.TTL
Wscript.Echo
Next

   © 2008 - 2013 Boris Toll      :: Scripts available: 6.481 ::      :: scriptbox.toll.at ::      :: powered by www.toll.at ::
  Google Entries:n/a
  Yahoo Backlinks:n/a
  Live Backlinks:n/a
  del.icio.us Bookmarks:n/a
  Technorati Links:n/a